Object of script: To automate the backup of all files in a chosen folder to a Stuffit Archive, using two conditions and a subroutine. The following stages are used:
1) Choose the source folder,
2) Choose the destination folder,
3) Make a list of the objects in the source folder,
4) Step through each item in the list in turn,
5) If the current item is not a folder, move to the next step. Otherwise, forget this item and move on to the next.
6) If the label of the current item is 7 (counting down the menu in the Finder), call the DoStuff subroutine and stuff the file.
